home *** CD-ROM | disk | FTP | other *** search
/ The Uninvited Press Kit / THE UNINVITED.iso / pc / program.dxr / Internal_33_Save Frame Hold Create basic paths.ls < prev    next >
Encoding:
Text File  |  2008-12-30  |  639 b   |  30 lines
  1. global gphotolist, gImNum, gSvFile, dLM, basicSavePath, gLF
  2.  
  3. on enterFrame
  4.   if gphotolist.count = gImNum then
  5.     sprite(90).member = member("But_DES2")
  6.   else
  7.     sprite(90).member = member("But_SEL2")
  8.   end if
  9.   if gphotolist = [] then
  10.     sprite(98).member = member("But_Exit")
  11.   else
  12.     sprite(98).member = member("But_Svex2")
  13.   end if
  14.   FindMac = the platform contains "mac"
  15.   if FindMac then
  16.     the itemDelimiter = ":"
  17.     gLF = RETURN
  18.   else
  19.     the itemDelimiter = "\"
  20.     gLF = RETURN & numToChar(10)
  21.   end if
  22.   dsk = baSysFolder("Desktop")
  23.   dLM = the itemDelimiter
  24.   basicSavePath = dsk
  25. end
  26.  
  27. on exitFrame
  28.   go(the frame)
  29. end
  30.